object fmBillManager: TfmBillManager
  Left = 0
  Top = 0
  Caption = #19994#21153#36319#36394#21160#24577
  ClientHeight = 592
  ClientWidth = 948
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 948
    Height = 31
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object cbxStaff: TcxComboBox
      Left = 56
      Top = 4
      Properties.DropDownListStyle = lsFixedList
      TabOrder = 0
      Width = 121
    end
    object cbxType: TcxComboBox
      Left = 230
      Top = 4
      Properties.DropDownListStyle = lsFixedList
      Properties.Items.Strings = (
        #25152#26377
        #23458#25143#36319#36394#35760#24405
        #20379#24212#21830#36319#36394#35760#24405
        #39033#30446#36319#36394#35760#24405
        #35746#21333#36319#36394#35760#24405
        #37319#36141#21333#36319#36394#35760#24405)
      TabOrder = 1
      Text = #25152#26377
      Width = 121
    end
    object cxLabel1: TcxLabel
      Left = 10
      Top = 5
      Caption = #19994#21153#21592
    end
    object cxLabel2: TcxLabel
      Left = 192
      Top = 5
      Caption = #31867#22411
    end
    object btnSearch: TcxButton
      Left = 758
      Top = 4
      Width = 70
      Height = 21
      Caption = #26597#35810
      TabOrder = 4
      OnClick = btnSearchClick
    end
    object cbxDateEnd: TcxDateEdit
      Left = 626
      Top = 4
      Enabled = False
      TabOrder = 5
      Width = 121
    end
    object cbxDateStart: TcxDateEdit
      Left = 482
      Top = 4
      Enabled = False
      TabOrder = 6
      Width = 121
    end
    object cbxDateType: TcxComboBox
      Left = 414
      Top = 4
      Properties.DropDownListStyle = lsFixedList
      Properties.Items.Strings = (
        #25152#26377
        #26412#26085
        #26412#21608
        #26412#26376
        #26412#24180#24230
        #33258#23450#20041)
      Properties.OnChange = cbxDateTypePropertiesChange
      TabOrder = 7
      Text = #25152#26377
      Width = 60
    end
    object cxLabel3: TcxLabel
      Left = 360
      Top = 5
      Caption = #26597#35810#26085#26399
    end
    object cxLabel4: TcxLabel
      Left = 608
      Top = 5
      Caption = '---'
    end
  end
  object grd: TcxGrid
    Left = 0
    Top = 31
    Width = 948
    Height = 561
    Align = alClient
    TabOrder = 1
    LookAndFeel.Kind = lfOffice11
    object tvBill: TcxGridDBTableView
      OnDblClick = tvBillDblClick
      NavigatorButtons.ConfirmDelete = False
      DataController.DataSource = dsBrowser
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <
        item
          Kind = skCount
          Column = tvBillColumn1
        end>
      DataController.Summary.SummaryGroups = <>
      OptionsBehavior.CellHints = True
      OptionsView.Footer = True
      object tvBillColumn1: TcxGridDBColumn
        Caption = #19994#21153#31867#22411
        DataBinding.FieldName = 'billtype'
        Options.Editing = False
        Width = 90
      end
      object tvBillColumn2: TcxGridDBColumn
        Caption = #21517#31216
        DataBinding.FieldName = 'name'
        Options.Editing = False
        Width = 120
      end
      object tvBillColumn3: TcxGridDBColumn
        Caption = #36319#36394#26085#26399
        DataBinding.FieldName = 'date'
        Options.Editing = False
        Width = 70
      end
      object tvBillColumn4: TcxGridDBColumn
        Caption = #32852#31995#20154
        DataBinding.FieldName = 'man'
        Options.Editing = False
        Width = 70
      end
      object tvBillColumn5: TcxGridDBColumn
        Caption = #20027#39064
        DataBinding.FieldName = 'title'
        Options.Editing = False
        Width = 120
      end
      object tvBillColumn6: TcxGridDBColumn
        Caption = #31867#22411
        DataBinding.FieldName = 'type'
        Options.Editing = False
        Width = 70
      end
      object tvBillColumn7: TcxGridDBColumn
        Caption = #36319#36394#20869#23481
        DataBinding.FieldName = 'content'
        Options.Editing = False
        Width = 200
      end
      object tvBillColumn8: TcxGridDBColumn
        Caption = #25805#20316#20154
        DataBinding.FieldName = 'staff'
        Options.Editing = False
        Width = 60
      end
      object tvBillColumn9: TcxGridDBColumn
        Caption = #22791#27880
        DataBinding.FieldName = 'remark'
        Options.Editing = False
        Width = 120
      end
      object tvBillColumn10: TcxGridDBColumn
        Caption = #38468#20214
        DataBinding.FieldName = 'attach'
        Options.Editing = False
        Width = 70
      end
      object tvBillColumn11: TcxGridDBColumn
        Caption = #38468#20214#26597#30475
        PropertiesClassName = 'TcxButtonEditProperties'
        Properties.Buttons = <
          item
            Caption = #26597#30475
            Default = True
            Kind = bkText
          end>
        Properties.ViewStyle = vsButtonsAutoWidth
        Properties.OnButtonClick = tvBillColumn11PropertiesButtonClick
        Width = 60
      end
      object tvBillpid: TcxGridDBColumn
        DataBinding.FieldName = 'pid'
        Visible = False
        Options.Editing = False
      end
    end
    object lvBill: TcxGridLevel
      GridView = tvBill
    end
  end
  object dsBrowser: TDADataSource
    DataSet = tblBrowser.Dataset
    DataTable = tblBrowser
    Left = 314
    Top = 196
  end
  object tblBrowser: TDAMemDataTable
    RemoteUpdatesOptions = [ruoOnPost]
    Fields = <>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rdaBrowser
    ReadOnly = True
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'd_projectlist'
    IndexDefs = <>
    Left = 344
    Top = 196
  end
  object rdaBrowser: TDARemoteDataAdapter
    GetSchemaCall.RemoteService = ClientDataModule.RemoteService
    GetDataCall.RemoteService = ClientDataModule.RemoteService
    GetDataCall.MethodName = 'SQLGetData'
    GetDataCall.Params = <
      item
        Name = 'Result'
        DataType = rtBinary
        Flag = fResult
      end
      item
        Name = 'aSQLText'
        DataType = rtString
        Flag = fIn
      end
      item
        Name = 'aIncludeSchema'
        DataType = rtBoolean
        Flag = fIn
      end
      item
        Name = 'aMaxRecords'
        DataType = rtInteger
        Flag = fIn
      end>
    GetDataCall.Default = False
    GetDataCall.OutgoingTableNamesParameter = 'aTableNameArray'
    GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray'
    GetDataCall.IncomingDataParameter = 'Result'
    GetDataCall.OutgoingIncludeSchemaParameter = 'aIncludeSchema'
    GetDataCall.OutgoingMaxRecordsParameter = 'aMaxRecords'
    UpdateDataCall.RemoteService = ClientDataModule.RemoteService
    UpdateDataCall.MethodName = 'UpdateBaseTable'
    UpdateDataCall.Params = <
      item
        Name = 'Result'
        DataType = rtBinary
        Flag = fResult
        Value = Null
      end
      item
        Name = 'ATablename'
        DataType = rtString
        Flag = fIn
        Value = Null
      end
      item
        Name = 'Delta'
        DataType = rtBinary
        Flag = fIn
        Value = Null
      end>
    UpdateDataCall.Default = False
    UpdateDataCall.OutgoingDeltaParameter = 'Delta'
    UpdateDataCall.IncomingDeltaParameter = 'Result'
    GetScriptsCall.RemoteService = ClientDataModule.RemoteService
    RemoteService = ClientDataModule.RemoteService
    DataStreamer = ClientDataModule.DataStreamer
    Left = 372
    Top = 196
  end
end
